(\%S\% $\backslash$p.AbSetHD (get\_int\_arg `hn` p) p)